<%@LANGUAGE="VBSCRIPT"%> [an error occurred while processing this directive] <% Dim rsDetallesPCMarca Dim rsDetallesPCMarca_numRows Set rsDetallesPCMarca = Server.CreateObject("ADODB.Recordset") rsDetallesPCMarca.ActiveConnection = MM_PCs_STRING rsDetallesPCMarca.Source = "SELECT * FROM FichasPCMarca WHERE ID=" & Request("Id") rsDetallesPCMarca.CursorType = 0 rsDetallesPCMarca.CursorLocation = 2 rsDetallesPCMarca.LockType = 1 rsDetallesPCMarca.Open() rsDetallesPCMarca_numRows = 0 Set rsLaptops = Server.CreateObject("ADODB.Recordset") rsLaptops.ActiveConnection = MM_PCs_STRING rsLaptops.Source = "SELECT PCMarca.* FROM PCMarca WHERE (((PCMarca.[No])="&request("Id")&"))" rsLaptops.CursorType = 0 rsLaptops.CursorLocation = 2 rsLaptops.LockType = 1 rsLaptops.Open() 'response.Write(rsLaptops.recordcount) 'response.Write("SELECT * FROM Laptops WHERE No="& Request("Id")) if not rsLaptops.eof then preciolista=FormatCurrency(rsLaptops.Fields.Item("Precio de Lista").Value,0) preciofinal=FormatCurrency(rsLaptops.Fields.Item("Final").Value,0) descuento=FormatCurrency(rsLaptops.Fields.Item("Descuento -15%").Value,0) end if %> [an error occurred while processing this directive] GSETEL- Grupo de Servicios Telemáticos
<%if (Session("login")="") then %> Regístrese
Identifíquese
 <%else%> Terminar sesión
Opciones de usuario
<%end if%>
Ir a InicioDesarrolloServiciosEquipamiento  
Usted esta aquí >> Categorías de equipamientos / Laptop y Notebooks /Detalles de Equipos <%if (Session("login")<>"") then%>
Usuario: <%=Session("login")%> <%end if%>
 
Como comprar
 
Categorías
:: Equipos de cómputo
    Computadoras armadas
    Computadoras de marca
    Laptop y Notebook
    Monitores Pantalla Plana LCD
    Monitores Convencionales
:: Accesorios
:: Consumibles
:: Partes de equipos
    Procesadores
:: Comunicciones
:: Multimedia
:: Protección y energía
:: Muebles
 
algunas marcas
3COM, Actek, AMD, AOpen, Apacer, ASUS, ATI, Canon, Clié
Compaq, Complet, Creative
Dell, EPSON, Fujifilm, Geforce, Genius, Hitachi, HP, Intel, Kingston, Leadtek, LexMark, LG, LinkPro, LinkSys, Liteon, Lucent, MicroSoft
Microvolt, Mitsumi, Motorola, Norton, Palm, Pinnacle, Pioneer, Samsumg, Segate, SMC, Sony, Sound Blaster, TEAC, Texa, Toshiba, TredNet, Western Digital
Computadoras de marca / Equipos de computo
<%=(rsDetallesPcMarca.Fields.Item("Marca").Value)%> - <%=(rsDetallesPcMarca.Fields.Item("Modelo").Value)%>
<%if rsDetallesPCMarca.Fields.Item("NoImagenes").Value>1 then%> <%end if%> <%if rsDetallesPCMarca.Fields.Item("Tour").Value then%> <%end if%>
NUESTROS PRECIOS
Precio: <%=preciolista%>
-15%: <%=descuento%>
<% preciousd=preciofinal/tasacambio %> Precio Final: <%=preciofinal%>
Precio USD: <%=FormatCurrency(preciousd,0)%>

&NoImagenes=<%=(rsDetallesPCMarca.Fields.Item("NoImagenes").Value)%>','Fotos','width=410,height=420')">Ver mas fotos
.swf','Fotos','width=500,height=500')">Ver Tour del producto

 

CARACTERISTICAS
<%if(rsDetallesPCMarca.Fields.Item("Arquitectura").Value)<>"" then %> <%if (cuentalinea mod 2)=0 then color="bgcolor='#FFFFFF'" else color="bgcolor='#CCCCCC'" end if cuentalinea = cuentalinea+1 %> <%end if%> <%if(rsDetallesPCMarca.Fields.Item("Procesador").Value)<>"" then %> <%if (cuentalinea mod 2)=0 then color="bgcolor='#FFFFFF'" else color="bgcolor='#CCCCCC'" end if cuentalinea = cuentalinea+1 %> <%end if%> <%if(rsDetallesPCMarca.Fields.Item("Chipset").Value)<>"" then%> <%if (cuentalinea mod 2)=0 then color="bgcolor='#FFFFFF'" else color="bgcolor='#CCCCCC'" end if cuentalinea = cuentalinea+1 %> <%end if%> <%if(rsDetallesPCMarca.Fields.Item("SO").Value)<>"" then%> <%if (cuentalinea mod 2)=0 then color="bgcolor='#FFFFFF'" else color="bgcolor='#CCCCCC'" end if cuentalinea = cuentalinea+1 %> <%end if%> <%if(rsDetallesPCMarca.Fields.Item("MemoriaCache").Value)<>"" then%> <%if (cuentalinea mod 2)=0 then color="bgcolor='#FFFFFF'" else color="bgcolor='#CCCCCC'" end if cuentalinea = cuentalinea+1 %> <%end if%> <%if(rsDetallesPCMarca.Fields.Item("VelocidadBus").Value)<>"" then%> <%if (cuentalinea mod 2)=0 then color="bgcolor='#FFFFFF'" else color="bgcolor='#CCCCCC'" end if cuentalinea = cuentalinea+1 %> <%end if%> <%if(rsDetallesPCMarca.Fields.Item("Monitor").Value)<>"" then%> <%if (cuentalinea mod 2)=0 then color="bgcolor='#FFFFFF'" else color="bgcolor='#CCCCCC'" end if cuentalinea = cuentalinea+1 %> <%if(rsDetallesPCMarca.Fields.Item("TarjetasVideo").Value)<>"" then%> <%end if%> <%if (cuentalinea mod 2)=0 then color="bgcolor='#FFFFFF'" else color="bgcolor='#CCCCCC'" end if cuentalinea = cuentalinea+1 %> <%end if%> <%if(rsDetallesPCMarca.Fields.Item("Memoria").Value)<>"" then%> <%if (cuentalinea mod 2)=0 then color="bgcolor='#FFFFFF'" else color="bgcolor='#CCCCCC'" end if cuentalinea = cuentalinea+1 %> <%end if%> <%if(rsDetallesPCMarca.Fields.Item("DiscoDuro").Value)<>"" then%> <%if (cuentalinea mod 2)=0 then color="bgcolor='#FFFFFF'" else color="bgcolor='#CCCCCC'" end if cuentalinea = cuentalinea+1 %> <%end if%> <%if(rsDetallesPCMarca.Fields.Item("LectorOptico").Value)<>"" then%> <%if (cuentalinea mod 2)=0 then color="bgcolor='#FFFFFF'" else color="bgcolor='#CCCCCC'" end if cuentalinea = cuentalinea+1 %> <%end if%> <%if(rsDetallesPCMarca.Fields.Item("UnidadDisqueteOpcional").Value)<>"" then%> <%if (cuentalinea mod 2)=0 then color="bgcolor='#FFFFFF'" else color="bgcolor='#CCCCCC'" end if cuentalinea = cuentalinea+1 %> <%end if%> <%if(rsDetallesPCMarca.Fields.Item("RanuraMemoryStick").Value)<>"" then%> <%if (cuentalinea mod 2)=0 then color="bgcolor='#FFFFFF'" else color="bgcolor='#CCCCCC'" end if cuentalinea = cuentalinea+1 %> <%end if%> <%if(rsDetallesPCMarca.Fields.Item("Modem").Value)<>"" then%> <%if (cuentalinea mod 2)=0 then color="bgcolor='#FFFFFF'" else color="bgcolor='#CCCCCC'" end if cuentalinea = cuentalinea+1 %> <%end if%> <%if(rsDetallesPCMarca.Fields.Item("RedInalambicaIntegrada").Value)<>"" then%> <%if (cuentalinea mod 2)=0 then color="bgcolor='#FFFFFF'" else color="bgcolor='#CCCCCC'" end if cuentalinea = cuentalinea+1 %> <%end if%> <%if(rsDetallesPCMarca.Fields.Item("EthernetIntegrada").Value)<>"" then%> <%if (cuentalinea mod 2)=0 then color="bgcolor='#FFFFFF'" else color="bgcolor='#CCCCCC'" end if cuentalinea = cuentalinea+1 %> <%end if%> <%if(rsDetallesPCMarca.Fields.Item("ControlCursorTeclado").Value)<>"" then%> <%if (cuentalinea mod 2)=0 then color="bgcolor='#FFFFFF'" else color="bgcolor='#CCCCCC'" end if cuentalinea = cuentalinea+1 %> <%end if%> <%if(rsDetallesPCMarca.Fields.Item("RanurasPcCard").Value)<>"" then%> <%if (cuentalinea mod 2)=0 then color="bgcolor='#FFFFFF'" else color="bgcolor='#CCCCCC'" end if cuentalinea = cuentalinea+1 %> <%end if%> <%if(rsDetallesPCMarca.Fields.Item("Audio").Value)<>"" then%> <%if (cuentalinea mod 2)=0 then color="bgcolor='#FFFFFF'" else color="bgcolor='#CCCCCC'" end if cuentalinea = cuentalinea+1 %> <%end if%> <%if(rsDetallesPCMarca.Fields.Item("WebCamIntegrada").Value)<>"" then%> <%if (cuentalinea mod 2)=0 then color="bgcolor='#FFFFFF'" else color="bgcolor='#CCCCCC'" end if cuentalinea = cuentalinea+1 %> <%end if%> <%if(rsDetallesPCMarca.Fields.Item("OtrasInterfaces").Value)<>"" then%> <%if (cuentalinea mod 2)=0 then color="bgcolor='#FFFFFF'" else color="bgcolor='#CCCCCC'" end if cuentalinea = cuentalinea+1 %> <%end if%> <%if(rsDetallesPCMarca.Fields.Item("RequerimientosCorriente").Value)<>"" then%> <%if (cuentalinea mod 2)=0 then color="bgcolor='#FFFFFF'" else color="bgcolor='#CCCCCC'" end if cuentalinea = cuentalinea+1 %> <%end if%> <%if(rsDetallesPCMarca.Fields.Item("Dimensiones").Value)<>"" then%> <%if (cuentalinea mod 2)=0 then color="bgcolor='#FFFFFF'" else color="bgcolor='#CCCCCC'" end if cuentalinea = cuentalinea+1 %> <%end if%> <%if(rsDetallesPCMarca.Fields.Item("Peso").Value)<>"" then%> <%if (cuentalinea mod 2)=0 then color="bgcolor='#FFFFFF'" else color="bgcolor='#CCCCCC'" end if cuentalinea = cuentalinea+1 %> <%end if%> <%if(rsDetallesPCMarca.Fields.Item("Accesorios").Value)<>"" then%> <%if (cuentalinea mod 2)=0 then color="bgcolor='#FFFFFF'" else color="bgcolor='#CCCCCC'" end if cuentalinea = cuentalinea+1 %> <%end if%> <%if(rsDetallesPCMarca.Fields.Item("AccesoriosOpcionales").Value)<>"" then%> <%if (cuentalinea mod 2)=0 then color="bgcolor='#FFFFFF'" else color="bgcolor='#CCCCCC'" end if cuentalinea = cuentalinea+1 %> <%end if%> <%if(rsDetallesPCMarca.Fields.Item("Garantia").Value)<>"" then%> <%if (cuentalinea mod 2)=0 then color="bgcolor='#FFFFFF'" else color="bgcolor='#CCCCCC'" end if cuentalinea = cuentalinea+1 %> <%end if%> <%if(rsDetallesPCMarca.Fields.Item("SoftVideo").Value)<>"" then%> <%if (cuentalinea mod 2)=0 then color="bgcolor='#FFFFFF'" else color="bgcolor='#CCCCCC'" end if cuentalinea = cuentalinea+1 %> <%end if%> <%if(rsDetallesPCMarca.Fields.Item("SoftAudio").Value)<>"" then%> <%if (cuentalinea mod 2)=0 then color="bgcolor='#FFFFFF'" else color="bgcolor='#CCCCCC'" end if cuentalinea = cuentalinea+1 %> <%end if%> <%if(rsDetallesPCMarca.Fields.Item("SoftFotoDigital").Value)<>"" then%> <%if (cuentalinea mod 2)=0 then color="bgcolor='#FFFFFF'" else color="bgcolor='#CCCCCC'" end if cuentalinea = cuentalinea+1 %> <%end if%> <%if(rsDetallesPCMarca.Fields.Item("SoftComunicacion").Value)<>"" then%> <%if (cuentalinea mod 2)=0 then color="bgcolor='#FFFFFF'" else color="bgcolor='#CCCCCC'" end if cuentalinea = cuentalinea+1 %> <%end if%> <%if(rsDetallesPCMarca.Fields.Item("SoftSoporteOtros").Value)<>"" then%> <%if (cuentalinea mod 2)=0 then color="bgcolor='#FFFFFF'" else color="bgcolor='#CCCCCC'" end if cuentalinea = cuentalinea+1 %> <%end if%> <%if(rsDetallesPCMarca.Fields.Item("Notas").Value)<>"" then%> <%if (cuentalinea mod 2)=0 then color="bgcolor='#FFFFFF'" else color="bgcolor='#CCCCCC'" end if cuentalinea = cuentalinea+1 %> <%end if%>
> 
>Arquitectura ><%=(rsDetallesPCMarca.Fields.Item("Arquitectura").Value)%>
>Procesador ><%=(rsDetallesPCMarca.Fields.Item("Procesador").Value)%>
>Chipset ><%=(rsDetallesPCMarca.Fields.Item("Chipset").Value)%>
>Sistema Operativo ><%=(rsDetallesPCMarca.Fields.Item("SO").Value)%>
>Memoria Caché ><%=(rsDetallesPCMarca.Fields.Item("MemoriaCache").Value)%>
>Velocidad del Bus ><%=(rsDetallesPCMarca.Fields.Item("VelocidadBus").Value)%>
>Monitor ><%=(rsDetallesPCMarca.Fields.Item("Monitor").Value)%>
>Tarjeta de Video ><%=(rsDetallesPCMarca.Fields.Item("TarjetasVideo").Value)%>
>Memoria ><%=(rsDetallesPCMarca.Fields.Item("Memoria").Value)%>
>Disco Duro ><%=(rsDetallesPCMarca.Fields.Item("DiscoDuro").Value)%>
>Lector Optico ><%=(rsDetallesPCMarca.Fields.Item("LectorOptico").Value)%>
>Unidad de Diskette Opcional ><%=(rsDetallesPCMarca.Fields.Item("UnidadDisqueteOpcional").Value)%>
>Ranura Para Memory Stick y otras ><%=(rsDetallesPCMarca.Fields.Item("RanuraMemoryStick").Value)%>
>Módem ><%=(rsDetallesPCMarca.Fields.Item("Modem").Value)%>
>Red Inalámbrica Integrada ><%=(rsDetallesPCMarca.Fields.Item("RedInalambicaIntegrada").Value)%>
>Red ><%=(rsDetallesPCMarca.Fields.Item("EthernetIntegrada").Value)%>
>Control del Cursor/Teclado ><%=(rsDetallesPCMarca.Fields.Item("ControlCursorTeclado").Value)%>
>Öpciones de expanxión ><%=(rsDetallesPCMarca.Fields.Item("RanurasPcCard").Value)%>
>Audio ><%=(rsDetallesPCMarca.Fields.Item("Audio").Value)%>
>Webcam Integrada ><%=(rsDetallesPCMarca.Fields.Item("WebCamIntegrada").Value)%>
>Otras Interfaces ><%=(rsDetallesPCMarca.Fields.Item("Dimensiones").Value)%><%=(rsDetallesPCMarca.Fields.Item("OtrasInterfaces").Value)%>
>Requerimientos de Corriente ><%=(rsDetallesPCMarca.Fields.Item("RequerimientosCorriente").Value)%>
>Dimensiones (Altura x Ancho x Largo) > 
>Peso ><%=(rsDetallesPCMarca.Fields.Item("Peso").Value)%>
>Accesorios Incluidos ><%=(rsDetallesPCMarca.Fields.Item("Accesorios").Value)%>
>Accesorios Opcionales ><%=(rsDetallesPCMarca.Fields.Item("AccesoriosOpcionales").Value)%>
>Servicio y Garantía ><%=(rsDetallesPCMarca.Fields.Item("Garantia").Value)%>
>Software de Video ><%=(rsDetallesPCMarca.Fields.Item("SoftVideo").Value)%>
>Software de Audio ><%=(rsDetallesPCMarca.Fields.Item("SoftAudio").Value)%>
>Software de Fotografía Digital ><%=(rsDetallesPCMarca.Fields.Item("SoftFotoDigital").Value)%>
>Software de Comunicación ><%=(rsDetallesPCMarca.Fields.Item("SoftComunicacion").Value)%>
>Software de Soporte y Otros ><%=(rsDetallesPCMarca.Fields.Item("SoftSoporteOtros").Value)%>
>Notas ><%=(rsDetallesPCMarca.Fields.Item("Notas").Value)%>
 
    Copyright © 2004. Todos los derechos reservados. Gsetel    
<% rsDetallesPCMarca.Close() Set rsDetallesPCMarca = Nothing %>